object DateReqForm: TDateReqForm
  Left = 200
  Top = 99
  BorderStyle = bsDialog
  ClientHeight = 115
  ClientWidth = 258
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 4
    Top = 4
    Width = 89
    Height = 105
    Caption = 'Select Month'
    TabOrder = 0
    object MonthList: TListBox
      Left = 8
      Top = 16
      Width = 73
      Height = 81
      ItemHeight = 13
      Items.Strings = (
        'January'
        'February'
        'March'
        'April'
        'May'
        'June'
        'July'
        'August'
        'September'
        'October'
        'November'
        'December')
      TabOrder = 0
    end
  end
  object GroupBox2: TGroupBox
    Left = 104
    Top = 4
    Width = 69
    Height = 105
    Caption = 'Select Day'
    TabOrder = 1
    object DayList: TListBox
      Left = 8
      Top = 16
      Width = 53
      Height = 81
      ItemHeight = 13
      Items.Strings = (
        '1st'
        '2nd'
        '3rd'
        '4th'
        '5th'
        '6th'
        '7th'
        '8th'
        '9th'
        '10th'
        '11th'
        '12th'
        '13th'
        '14th'
        '15th'
        '16th'
        '17th'
        '18th'
        '19th'
        '20th'
        '21st'
        '22nd'
        '23rd'
        '24th'
        '25th'
        '26th'
        '27th'
        '28th'
        '29th'
        '30th'
        '31st')
      TabOrder = 0
    end
  end
  object GroupBox3: TGroupBox
    Left = 180
    Top = 4
    Width = 73
    Height = 45
    Caption = 'Select Year'
    TabOrder = 2
    object YearCombo: TComboBox
      Left = 6
      Top = 16
      Width = 61
      Height = 21
      Ctl3D = True
      ItemHeight = 13
      MaxLength = 4
      ParentCtl3D = False
      TabOrder = 0
    end
  end
  object Resetbtn: TBitBtn
    Left = 180
    Top = 52
    Width = 73
    Height = 21
    Hint = 'Reset To System Date'
    Caption = 'Reset'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 3
    OnClick = ResetbtnClick
  end
  object Acceptbtn: TBitBtn
    Left = 180
    Top = 76
    Width = 73
    Height = 21
    Hint = 'Accept This Date'
    Caption = 'Accept'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 4
    OnClick = AcceptbtnClick
  end
end